object frmPicProp: TfrmPicProp Left = 273 Top = 176 Width = 369 Height = 301 HelpContext = 2 Caption = 'Image Properties' Color = clBtnFace Constraints.MinHeight = 183 Constraints.MinWidth = 324 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] KeyPreview = True OldCreateOrder = False Position = poOwnerFormCenter ShowHint = True OnCreate = FormCreate OnDestroy = FormDestroy OnKeyDown = FormKeyDown DesignSize = ( 361 274) PixelsPerInch = 96 TextHeight = 13 object Bevel1: TBevel Left = 8 Top = 8 Width = 157 Height = 239 Anchors = [akLeft, akTop, akBottom] end object Label1: TLabel Left = 28 Top = 52 Width = 86 Height = 13 Caption = 'Transparent color:' end object SB_BkColor: TSpeedButton Left = 128 Top = 48 Width = 23 Height = 22 Hint = 'Set transparent color' Transparent = False OnClick = SB_BkColorClick end object SpeedButton1: TSpeedButton Left = 20 Top = 80 Width = 133 Height = 22 Hint = 'Load other picture' Caption = '&Load picture' OnClick = SpeedButton1Click end object Button1: TButton Left = 128 Top = 252 Width = 75 Height = 21 Anchors = [akRight, akBottom] Caption = '&Ok' ModalResult = 1 TabOrder = 2 end object Button2: TButton Left = 204 Top = 252 Width = 75 Height = 21 Anchors = [akRight, akBottom] Caption = '&Apply' Default = True TabOrder = 3 OnClick = Button2Click end object Button3: TButton Left = 280 Top = 252 Width = 75 Height = 21 Anchors = [akRight, akBottom] Cancel = True Caption = '&Cancel' ModalResult = 2 TabOrder = 4 end object Chk_Transp: TCheckBox Left = 16 Top = 20 Width = 129 Height = 17 Hint = 'Transparent' Alignment = taLeftJustify Caption = 'Transparent:' TabOrder = 0 OnClick = Chk_TranspClick end object ScrollBox1: TScrollBox Left = 172 Top = 7 Width = 182 Height = 240 HorzScrollBar.Tracking = True VertScrollBar.Tracking = True Anchors = [akLeft, akTop, akRight, akBottom] BevelOuter = bvNone TabOrder = 1 object Image1: TImage Left = 0 Top = 0 Width = 105 Height = 105 Cursor = crHandPoint Hint = 'Click to choose transparent color' AutoSize = True ParentShowHint = False ShowHint = True OnMouseDown = Image1MouseDown end end object CD: TColorDialog Ctl3D = True Options = [cdFullOpen, cdAnyColor] Left = 72 Top = 132 end object OPD: TOpenPictureDialog Filter = 'All (*.jpg;*.jpeg;*.bmp;*.ico;*.emf;*.wmf)|*.jpg;*.jpeg;*.bmp|JP' + 'EG Image File (*.jpg)|*.jpg|JPEG Image File (*.jpeg)|*.jpeg|Bitm' + 'aps (*.bmp)|*.bmp' Options = [ofHideReadOnly, ofFileMustExist, ofEnableSizing] Left = 44 Top = 132 end end